-- card: 5306 from stack: in -- bmap block id: 7239 -- flags: 4000 -- background id: 6685 -- name: Needs Top card ----- HyperTalk script ----- on openCard hide menuBar global showState put empty into showState ResetMenuField set hilite of background button "Market Needs" to true set hilite of background button "Examples" to false show card field "Select Field" put "Click on a market area in the list above to see needs, benefits, and features." into card field "Message Center" show card field "Message Center" end openCard on closeCard show card field "Select Field" hide card field "Message Center" end closeCard on ResetMenuField put " DTP/DTPres*" & return & " Desktop Communications" & return & " Legal" & return & " Engineering/Scientific" & return & " HyperCard Stack Development" & return into card field "Select Field" end ResetMenuField -- part 54 (field) -- low flags: 01 -- high flags: 2004 -- rect: left=13 top=91 right=190 bottom=228 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Select Field ----- HyperTalk script ----- on mouseUp global whichExample,showState put empty into whichExample put empty into showState put 1 + (the clickV - top of me) div textHeight of me into clickLine if line clickLine of me is not empty then put word 1 of line clickLine of card field "Select Field" into whichExample put "•" into char 1 of line clickLine of card field "Select Field" push card visual dissolve to card go to card whichExample end if end mouseUp on ResetMenuField put " DTP/DTPres*" & return & " Desktop Communications" & return & " Legal" & return & " Engineering/Scientific" & return & " HyperCard Stack Development" & return into card field "Select Field" end ResetMenuField -- part 55 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=27 top=204 right=233 bottom=212 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 9 -- style flags: 0 -- line height: 12 -- part name: Message Center -- part 56 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=402 top=3 right=42 bottom=438 -- title width / last selected line: 0 -- icon id / first selected line: 1008 / 1008 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp doMenu "Print Card" end mouseUp -- part 57 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=451 top=3 right=42 bottom=491 -- title width / last selected line: 0 -- icon id / first selected line: 1004 / 1004 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp play harpsichord a4 global search answer "Type of Search?" with "Browse" or "Automatic" or "Cancel" if it is "Browse" then visual wipe up slowly go to card "Glossary" of stack "Glossary" end if if it is "Automatic" then ask "Find Word?" put it into search if search is empty then exit mouseUp else visual wipe up slowly put "find search" into message box hide message go to card "Glossary" of stack "Glossary" find word search in field "Text" if the result is "not found" then answer "Word not found." with "OK" exit mouseUp else show card field id 13 wait 4 seconds hide card field id 13 end if end if end if end mouseUp -- part contents for card part 54 ----- text ----- DTP/DTPres* Desktop Communications Legal Engineering/Scientific HyperCard Stack Development -- part contents for card part 55 ----- text ----- Click on a market area in the list above to see needs, benefits, and features.